SetAttr Instruction

Syntax:

SetAttr Name$, Attrib

Group: File

Description:
Set the attributes for file Name$. If the file does not exist then a run-time error occurs.

Parameter Description

Name$ This string value is the path and name of the file. A path relative to the current directory can be used.

Attrib Set the file's attributes to this numeric value.

Example:

Sub Main
  Attrib = GetAttr("XXX")
  SetAttr "XXX",1 ' readonly
  Debug.Print GetAttr("XXX") ' 1
  SetAttr "XXX",Attrib
End Sub